SetDialog ([lNew]) --> true/false:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Functions:
~~~~~~~~~~
serves as a switch, if set to true (if returns true) the dialog line
output and change is enabled, if false it is disabled.

Parameter description:
~~~~~~~~~~~~~~~~~~~~~~
lNew: new value to set the switch

Return value:
~~~~~~~~~~~~~
true/false

Example:
~~~~~~~~
    ? SetDialog()        //the value of the switch
    SetDialog(true)      //set the switch to true
    ? SetDialog()        //returns true

Source code is in file  Object3.prg